home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / formbe1r / frm1play.frm (.txt) next >
Visual Basic Form  |  1999-08-09  |  26KB  |  811 lines
  1. VERSION 5.00
  2. Begin VB.Form frm1Player 
  3.    BackColor       =   &H00000000&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "One Player Tic Tac Toe"
  6.    ClientHeight    =   2595
  7.    ClientLeft      =   45
  8.    ClientTop       =   345
  9.    ClientWidth     =   4200
  10.    ControlBox      =   0   'False
  11.    LinkTopic       =   "Form1"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   2595
  15.    ScaleWidth      =   4200
  16.    StartUpPosition =   3  'Windows Default
  17.    Begin VB.Timer Timer4 
  18.       Interval        =   1
  19.       Left            =   5640
  20.       Top             =   480
  21.    End
  22.    Begin VB.Timer Timer3 
  23.       Left            =   5640
  24.       Top             =   960
  25.    End
  26.    Begin VB.Timer Timer2 
  27.       Left            =   5040
  28.       Top             =   960
  29.    End
  30.    Begin VB.Timer Timer1 
  31.       Interval        =   1
  32.       Left            =   5040
  33.       Top             =   360
  34.    End
  35.    Begin VB.CommandButton Command1 
  36.       Caption         =   "New Game"
  37.       Height          =   375
  38.       Left            =   2760
  39.       TabIndex        =   1
  40.       Top             =   240
  41.       Width           =   975
  42.    End
  43.    Begin VB.CommandButton Command2 
  44.       Caption         =   "E&xit"
  45.       Height          =   375
  46.       Left            =   2760
  47.       TabIndex        =   0
  48.       Top             =   840
  49.       Width           =   975
  50.    End
  51.    Begin VB.Line Line6 
  52.       BorderColor     =   &H0000FFFF&
  53.       BorderWidth     =   4
  54.       X1              =   3240
  55.       X2              =   3240
  56.       Y1              =   1440
  57.       Y2              =   2520
  58.    End
  59.    Begin VB.Label Label1 
  60.       BackStyle       =   0  'Transparent
  61.       Caption         =   "0"
  62.       BeginProperty Font 
  63.          Name            =   "Comic Sans MS"
  64.          Size            =   9
  65.          Charset         =   0
  66.          Weight          =   400
  67.          Underline       =   0   'False
  68.          Italic          =   0   'False
  69.          Strikethrough   =   0   'False
  70.       EndProperty
  71.       ForeColor       =   &H000000FF&
  72.       Height          =   255
  73.       Index           =   3
  74.       Left            =   3360
  75.       TabIndex        =   16
  76.       Top             =   1800
  77.       Width           =   375
  78.    End
  79.    Begin VB.Label Label1 
  80.       BackStyle       =   0  'Transparent
  81.       Caption         =   "0"
  82.       BeginProperty Font 
  83.          Name            =   "Comic Sans MS"
  84.          Size            =   9
  85.          Charset         =   0
  86.          Weight          =   400
  87.          Underline       =   0   'False
  88.          Italic          =   0   'False
  89.          Strikethrough   =   0   'False
  90.       EndProperty
  91.       ForeColor       =   &H000000FF&
  92.       Height          =   255
  93.       Index           =   2
  94.       Left            =   2760
  95.       TabIndex        =   15
  96.       Top             =   1800
  97.       Width           =   375
  98.    End
  99.    Begin VB.Label Label1 
  100.       BackStyle       =   0  'Transparent
  101.       Caption         =   "Losses"
  102.       BeginProperty Font 
  103.          Name            =   "Comic Sans MS"
  104.          Size            =   9
  105.          Charset         =   0
  106.          Weight          =   400
  107.          Underline       =   0   'False
  108.          Italic          =   0   'False
  109.          Strikethrough   =   0   'False
  110.       EndProperty
  111.       ForeColor       =   &H000000FF&
  112.       Height          =   255
  113.       Index           =   1
  114.       Left            =   3360
  115.       TabIndex        =   14
  116.       Top             =   1440
  117.       Width           =   615
  118.    End
  119.    Begin VB.Label Label1 
  120.       BackStyle       =   0  'Transparent
  121.       Caption         =   "Wins"
  122.       BeginProperty Font 
  123.          Name            =   "Comic Sans MS"
  124.          Size            =   9
  125.          Charset         =   0
  126.          Weight          =   400
  127.          Underline       =   0   'False
  128.          Italic          =   0   'False
  129.          Strikethrough   =   0   'False
  130.       EndProperty
  131.       ForeColor       =   &H000000FF&
  132.       Height          =   255
  133.       Index           =   0
  134.       Left            =   2640
  135.       TabIndex        =   13
  136.       Top             =   1440
  137.       Width           =   495
  138.    End
  139.    Begin VB.Label lblnum 
  140.       Caption         =   "1"
  141.       Height          =   255
  142.       Left            =   5640
  143.       TabIndex        =   12
  144.       Top             =   360
  145.       Visible         =   0   'False
  146.       Width           =   615
  147.    End
  148.    Begin VB.Label turn 
  149.       BackColor       =   &H00000000&
  150.       BackStyle       =   0  'Transparent
  151.       ForeColor       =   &H000000FF&
  152.       Height          =   615
  153.       Left            =   4920
  154.       TabIndex        =   11
  155.       Top             =   600
  156.       Width           =   615
  157.    End
  158.    Begin VB.Line Line1 
  159.       BorderColor     =   &H000000FF&
  160.       BorderWidth     =   4
  161.       X1              =   840
  162.       X2              =   840
  163.       Y1              =   120
  164.       Y2              =   2400
  165.    End
  166.    Begin VB.Line Line2 
  167.       BorderColor     =   &H000000FF&
  168.       BorderWidth     =   4
  169.       X1              =   1680
  170.       X2              =   1680
  171.       Y1              =   120
  172.       Y2              =   2400
  173.    End
  174.    Begin VB.Line Line3 
  175.       BorderColor     =   &H000000FF&
  176.       BorderWidth     =   4
  177.       X1              =   120
  178.       X2              =   2400
  179.       Y1              =   840
  180.       Y2              =   840
  181.    End
  182.    Begin VB.Line Line4 
  183.       BorderColor     =   &H000000FF&
  184.       BorderWidth     =   4
  185.       X1              =   120
  186.       X2              =   2400
  187.       Y1              =   1680
  188.       Y2              =   1680
  189.    End
  190.    Begin VB.Label s 
  191.       BackColor       =   &H00000000&
  192.       BackStyle       =   0  'Transparent
  193.       BeginProperty Font 
  194.          Name            =   "MS Sans Serif"
  195.          Size            =   24
  196.          Charset         =   0
  197.          Weight          =   400
  198.          Underline       =   0   'False
  199.          Italic          =   0   'False
  200.          Strikethrough   =   0   'False
  201.       EndProperty
  202.       ForeColor       =   &H00C00000&
  203.       Height          =   615
  204.       Index           =   0
  205.       Left            =   240
  206.       TabIndex        =   10
  207.       Top             =   120
  208.       Width           =   615
  209.    End
  210.    Begin VB.Label s 
  211.       BackColor       =   &H00000000&
  212.       BackStyle       =   0  'Transparent
  213.       BeginProperty Font 
  214.          Name            =   "MS Sans Serif"
  215.          Size            =   24
  216.          Charset         =   0
  217.          Weight          =   400
  218.          Underline       =   0   'False
  219.          Italic          =   0   'False
  220.          Strikethrough   =   0   'False
  221.       EndProperty
  222.       ForeColor       =   &H00C00000&
  223.       Height          =   615
  224.       Index           =   1
  225.       Left            =   1080
  226.       TabIndex        =   9
  227.       Top             =   120
  228.       Width           =   615
  229.    End
  230.    Begin VB.Label s 
  231.       BackColor       =   &H00000000&
  232.       BackStyle       =   0  'Transparent
  233.       BeginProperty Font 
  234.          Name            =   "MS Sans Serif"
  235.          Size            =   24
  236.          Charset         =   0
  237.          Weight          =   400
  238.          Underline       =   0   'False
  239.          Italic          =   0   'False
  240.          Strikethrough   =   0   'False
  241.       EndProperty
  242.       ForeColor       =   &H00C00000&
  243.       Height          =   615
  244.       Index           =   2
  245.       Left            =   1800
  246.       TabIndex        =   8
  247.       Top             =   120
  248.       Width           =   615
  249.    End
  250.    Begin VB.Label s 
  251.       BackColor       =   &H00000000&
  252.       BackStyle       =   0  'Transparent
  253.       BeginProperty Font 
  254.          Name            =   "MS Sans Serif"
  255.          Size            =   24
  256.          Charset         =   0
  257.          Weight          =   400
  258.          Underline       =   0   'False
  259.          Italic          =   0   'False
  260.          Strikethrough   =   0   'False
  261.       EndProperty
  262.       ForeColor       =   &H00C00000&
  263.       Height          =   615
  264.       Index           =   3
  265.       Left            =   240
  266.       TabIndex        =   7
  267.       Top             =   960
  268.       Width           =   615
  269.    End
  270.    Begin VB.Label s 
  271.       BackColor       =   &H00000000&
  272.       BackStyle       =   0  'Transparent
  273.       BeginProperty Font 
  274.